object Dlg_Waluty: TDlg_Waluty Left = 235 Top = 148 BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Kursy walut' ClientHeight = 363 ClientWidth = 408 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poScreenCenter Scaled = False OnClose = FormClose OnDestroy = FormDestroy OnKeyPress = FormKeyPress OnMouseMove = FormMouseMove OnPaint = FormPaint OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 208 Top = 24 Width = 193 Height = 13 Caption = 'Pobieranie aktualizacji. Prosze czeka� ...' Visible = False end object btnPobierz: TPanel Left = 220 Top = 104 Width = 173 Height = 25 Anchors = [akLeft, akTop, akRight] BevelOuter = bvNone Caption = 'pobierz aktualizacje' Color = 8257541 Font.Charset = DEFAULT_CHARSET Font.Color = clWhite Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 0 OnClick = btnPobierzClick end object CB_Waluta: TComboBox Left = 220 Top = 64 Width = 97 Height = 21 Style = csDropDownList ItemHeight = 13 TabOrder = 1 OnChange = CB_WalutaChange OnKeyPress = FormKeyPress end object Kurs: TEdit Left = 336 Top = 64 Width = 57 Height = 21 TabOrder = 2 OnKeyPress = FormKeyPress end object StatusBar: TStatusBar Left = 0 Top = 344 Width = 408 Height = 19 Panels = <> SimplePanel = True end object GroupBox1: TGroupBox Left = 8 Top = 8 Width = 193 Height = 129 TabOrder = 4 object Info: TLabel Left = 8 Top = 16 Width = 18 Height = 13 Caption = 'Info' end end object Memo1: TMemo Left = 40 Top = 168 Width = 329 Height = 153 ScrollBars = ssBoth TabOrder = 5 WordWrap = False end object GetHTTP: TNMHTTP Port = 0 ReportLevel = 0 Body = 'Default.htm' Header = 'Head.txt' InputFileMode = False OutputFileMode = False OnSuccess = GetHTTPSuccess OnFailure = GetHTTPFailure ProxyPort = 0 Left = 152 Top = 16 end object GetXML: TNMHTTP Port = 0 ReportLevel = 0 Body = 'Default.htm' Header = 'Head.txt' InputFileMode = False OutputFileMode = False OnSuccess = GetXMLSuccess OnFailure = GetXMLFailure ProxyPort = 0 Left = 152 Top = 48 end end